Register color code for learning game ( 443 pas de programme )

	Coordinating colors and numbers memory game.
	Enter a color EXE. to take the test type EXE and enter the # of the color EXE.

10 A$(0)="BLACK":A$(1)="BROWN":A$(2)="RED":A$(3)="ORANGE"
20 A$(4)="YELLOW":A$(5)="GREEN":A$(6)="BLUE":A$(7)="PURPLE"
30 A$(8)="GRAY":A$(9)="WHITE"
100 FOR T=1 TO 250
101 NEXT R
103 PRINT CSR 0;"*__*__*__*__";:PRINT CSR 0;"COLOR OR,";
104 INPUT "FOR TEST, WRITE TEST, EXE ",K$
106 IF K$="TEST" THEN 150
110 FOR Q=0 TO 9
120 IF K$=A$(Q);PRINT K$;" IS ";Q;:GOTO 100
130 NEXT Q
140 PRINT "TRY AGAIN...";:GOTO 100
150 S=INT(RAN#*10)
151 PRINT "WHAT # IS ";A$(S);
160 INPUT T
170 IF S=T;PRINT "RIGHT! ";:GOTO 190
180 PRINT " WRONG,I SAID ";A$(S);:GOTO 160
190 S=INT(RAN#*10):PRINT A$(S);:GOTO 160